library(ggplot2)
library(tidyverse)
library(scales)
library(plotly)
cc_list <- readRDS("comp-comp_covid.rds")
New cases per day for each region
ggplotly(cc_list$`New cases per day for each region`)
## `geom_smooth()` using formula 'y ~ x'
New cases per day for each region facet
ggplotly(cc_list$`New cases per day for each region facet`)
Cases against Death
ggplotly(cc_list$`Cases against Death`)
## Warning in self$trans$transform(x): NaNs produced
## Warning: Transformation introduced infinite values in continuous x-axis
Cases against Death facet
ggplotly(cc_list$`Cases against Death facet`)
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width
## Warning: Aspect ratios aren't yet implemented, but you can manually set a suitable height/width